
identifier='limitedAngle_outerFading_90';
imSize=[512,512];
indexStruct=get_indexStruct(identifier,imSize);
num_radial=length(indexStruct);




curvelet=get_curvelet(identifier,imSize,0,0);

for radial=4:num_radial %radial scale
    num_angular=indexStruct(radial);
    for angular=1:num_angular %angular scale
        [curvelet,window_size]=get_curvelet(identifier,imSize,radial,angular);
        curvelet=curvelet{1};
        subplot(2,2,1);
        imagesc(curvelet);
        subplot(2,2,2);
        window=get_wrapp_window(curvelet,window_size);
        bwindow=get_wrapp_periodization(get_wrapp_window(curvelet,window_size),imSize);
        imagesc(bwindow.*curvelet-curvelet.^2);
        subplot(2,2,3);
        imagesc(bwindow.*curvelet);
        subplot(2,2,4);
        imagesc(window);
        pause();
    end
end

